object ImportDlg: TImportDlg Left = 115 Top = 90 ActiveControl = OKBtn BorderStyle = bsDialog Caption = 'Import Settings' ClientHeight = 329 ClientWidth = 492 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Position = poScreenCenter ShowHint = True OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Image1: TImage Left = 8 Top = 0 Width = 32 Height = 32 AutoSize = True end object Label3: TLabel Left = 48 Top = 8 Width = 293 Height = 13 Caption = 'Select the items you want to import by double-clicking on them' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label1: TLabel Left = 64 Top = 22 Width = 315 Height = 13 Caption = 'or clicking the Add button, then click the Import button when do' + 'ne.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object LoadBtn: TSpeedButton Left = 8 Top = 40 Width = 20 Height = 20 Hint = 'Select input file|' Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555555555555555500000000000555550000000000 05555008888888888055500B7B7B7B7B7055507088888888805550F0B7B7B7B7 B055507088888888880550B07B7B7B7B7B05507708888888880550FB07B7B7B7 B705507708888888888050BF0B7B7B7B7B70507770000888888050FBF00007B7 B7B0507777777000000550BFBFBFB0000005507777777777055550FBFBFBFBFB 0555507777777777055550BFBFBFBFBF0555507777700000555550FBFBF00000 5555550000055555555555000005555555555555555555555555555555555555 5555555555555555555555555555555555555555555555555555000000000000 0000000000000000000000000000000000000000} NumGlyphs = 2 OnClick = LoadBtnClick end object SpeedButton2: TSpeedButton Left = 222 Top = 112 Width = 68 Height = 25 Hint = 'Add|' Caption = 'Add' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333333333344333333333333333FF33333333333334643333 3333333333F3F33333333333346643333333333333F33F333333333334666433 3333333333F333F333333333346666433333333333F3333F3333333334666664 3333333333F33333F3333333346666664333333333F333333F33333334666666 E333333333F33333383333333466666E3333333333F3333383333333346666E3 3333333333F333383333333334666E333333333333F33383333333333466E333 3333333333F3383333333333346E33333333333333F38333333333333EE33333 3333333333883333333333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} Layout = blGlyphRight Margin = 4 NumGlyphs = 2 ParentFont = False OnClick = SpeedButton2Click end object SpeedButton3: TSpeedButton Left = 222 Top = 144 Width = 68 Height = 25 Hint = 'Remove|' Caption = 'Remove' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333333333333333344333333333333333FF33333333333346 433333333333333F3F3333333333346643333333333333F33F33333333334666 4333333333333F333F33333333346666433333333333F3333F33333333466666 43333333333F33333F333333346666664333333333F333333F3333333E666666 43333333338333333F33333333E6666643333333333833333F333333333E6666 43333333333383333F3333333333E66643333333333338333F33333333333E66 43333333333333833F333333333333E643333333333333383F3333333333333E E333333333333333883333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} Margin = 1 NumGlyphs = 2 ParentFont = False OnClick = SpeedButton3Click end object Label2: TLabel Left = 296 Top = 48 Width = 98 Height = 13 Caption = 'Items to be imported:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object OKBtn: TBitBtn Left = 236 Top = 294 Width = 77 Height = 27 Caption = '&Import' Default = True Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 1 ParentFont = False TabOrder = 0 OnClick = OKBtnClick Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 320 Top = 294 Width = 77 Height = 27 Cancel = True Caption = 'Cancel' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 2 ParentFont = False TabOrder = 1 Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 404 Top = 294 Width = 77 Height = 27 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 Kind = bkHelp Margin = 2 Spacing = -1 IsControl = True end object InList: TListBox Left = 320 Top = 40 Width = 153 Height = 57 ExtendedSelect = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False Sorted = True TabOrder = 3 Visible = False end object OutList: TListBox Left = 336 Top = 80 Width = 153 Height = 57 ExtendedSelect = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False Sorted = True TabOrder = 4 Visible = False end object InGrid: TDrawGrid Left = 8 Top = 64 Width = 209 Height = 168 ColCount = 2 DefaultRowHeight = 15 DefaultDrawing = False FixedCols = 0 RowCount = 10 FixedRows = 0 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Options = [goRowSelect, goThumbTracking] ParentFont = False ScrollBars = ssVertical TabOrder = 5 OnClick = InGridClick OnDrawCell = InGridDrawCell OnKeyDown = InGridKeyDown OnKeyPress = InGridKeyPress OnMouseDown = InGridMouseDown OnMouseMove = InGridMouseMove OnMouseUp = InGridMouseUp ColWidths = ( 73 146) end object InFile: TEdit Left = 32 Top = 40 Width = 185 Height = 21 TabStop = False Color = clBtnFace Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 6 end object OutGrid: TDrawGrid Left = 296 Top = 64 Width = 185 Height = 168 ColCount = 2 DefaultRowHeight = 15 DefaultDrawing = False FixedCols = 0 FixedRows = 0 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Options = [goRowSelect, goThumbTracking] ParentFont = False ScrollBars = ssVertical TabOrder = 7 OnClick = OutGridClick OnDrawCell = OutGridDrawCell OnKeyDown = InGridKeyDown OnKeyPress = OutGridKeyPress OnMouseDown = OutGridMouseDown OnMouseMove = OutGridMouseMove OnMouseUp = InGridMouseUp ColWidths = ( 73 146) end object Panel1: TPanel Left = 8 Top = 240 Width = 209 Height = 81 BevelOuter = bvLowered TabOrder = 8 object DoAlias: TRadioButton Left = 24 Top = 8 Width = 73 Height = 17 Caption = 'Aliases' Checked = True Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 TabStop = True OnClick = DoAliasClick end object DoVar: TRadioButton Left = 24 Top = 24 Width = 73 Height = 17 Caption = 'Variables' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = DoAliasClick end object DoPath: TRadioButton Left = 24 Top = 40 Width = 73 Height = 17 Caption = 'Paths' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = DoAliasClick end object DoTrig: TRadioButton Left = 112 Top = 8 Width = 73 Height = 17 Caption = 'Triggers' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = DoAliasClick end object DoMacro: TRadioButton Left = 24 Top = 56 Width = 73 Height = 17 Caption = 'Macros' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = DoAliasClick end object DoBut: TRadioButton Left = 112 Top = 24 Width = 73 Height = 17 Caption = 'Buttons' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = DoAliasClick end object DoOther: TRadioButton Left = 112 Top = 40 Width = 73 Height = 17 Caption = 'Colors, etc' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 6 OnClick = DoAliasClick end end object Pages: TNotebook Left = 224 Top = 236 Width = 71 Height = 57 TabOrder = 9 object TPage Left = 0 Top = 0 Caption = 'Aliases' object AliasText: TLabel Left = 11 Top = 7 Width = 54 Height = 13 Alignment = taRightJustify Caption = 'Alias name:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object ComText: TLabel Left = 10 Top = 31 Width = 55 Height = 13 Alignment = taRightJustify Caption = 'Commands:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end end object TPage Left = 0 Top = 0 Caption = 'Variables' object Label4: TLabel Left = 24 Top = 7 Width = 41 Height = 13 Alignment = taRightJustify Caption = 'Variable:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label5: TLabel Left = 35 Top = 31 Width = 30 Height = 13 Alignment = taRightJustify Caption = 'Value:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end end object TPage Left = 0 Top = 0 Caption = 'Paths' object Label6: TLabel Left = 11 Top = 7 Width = 54 Height = 13 Alignment = taRightJustify Caption = 'Path name:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label7: TLabel Left = 15 Top = 31 Width = 50 Height = 13 Alignment = taRightJustify Caption = 'Directions:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end end object TPage Left = 0 Top = 0 Caption = 'Macros' object Label8: TLabel Left = 44 Top = 7 Width = 21 Height = 13 Alignment = taRightJustify Caption = 'Key:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label9: TLabel Left = 10 Top = 31 Width = 55 Height = 13 Alignment = taRightJustify Caption = 'Commands:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end end object TPage Left = 0 Top = 0 Caption = 'Triggers' object Label10: TLabel Left = 28 Top = 7 Width = 37 Height = 13 Alignment = taRightJustify Caption = 'Pattern:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label11: TLabel Left = 10 Top = 31 Width = 55 Height = 13 Alignment = taRightJustify Caption = 'Commands:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end end object TPage Left = 0 Top = 0 Caption = 'Buttons' object Label12: TLabel Left = 26 Top = 7 Width = 39 Height = 13 Alignment = taRightJustify Caption = 'Caption:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label13: TLabel Left = 15 Top = 31 Width = 50 Height = 13 Alignment = taRightJustify Caption = 'Command:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end end object TPage Left = 0 Top = 0 Caption = 'Other' end end object AliasName: TEdit Left = 296 Top = 241 Width = 185 Height = 21 TabStop = False Color = clBtnFace Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 10 Text = 'AliasName' end object AliasCom: TEdit Left = 296 Top = 265 Width = 185 Height = 21 TabStop = False Color = clBtnFace Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 11 Text = 'AliasCom' end object OpenDialog: TOpenDialog DefaultExt = 'mud' FileEditStyle = fsEdit Filter = 'MUD files|*.mud|All files|*.*' Left = 448 Top = 8 end end